﻿Imports System

Namespace System.Workflow.ComponentModel.Design
    Friend Class SelectionChangeEventArgs
        Inherits EventArgs
        ' Methods
        Public Sub New(ByVal previousItem As ItemInfo, ByVal currentItem As ItemInfo)
            Me.previousItem = previousItem
            Me.currentItem = currentItem
        End Sub


        ' Properties
        Public ReadOnly Property CurrentItem As ItemInfo
            Get
                Return Me.currentItem
            End Get
        End Property


        ' Fields
        Private currentItem As ItemInfo
        Private previousItem As ItemInfo
    End Class
End Namespace

